package GeoLocation::ReverseGeocoderFactory;

use strict;
use warnings;
use 5.010;

sub get_instance {
    my $class = shift;
    my $requested_type = shift;
    my $class_suffix = "ReverseGeocoder";
    my $location = "GeoLocation/$requested_type$class_suffix.pm";

    $class = "GeoLocation::$requested_type$class_suffix";

    require $location;

    return $class->new;
}

1;
